"Dette program installerer MTool og MI på Din Amiga. Hvis Du ikke forstår en af spørgsmålene der optræder under installationen, vælg 'hjælp...' knappen. Du vil så blive oplyst om det næste skridt og hvad det er godt for."
)
(set progdest
(askdir
(prompt "Vær venlig og vælg en skuffe til MTool.")
(help "MTool og MI vil blive lagt over i dette directory.")
(if (askbool (help "Hvis Du har valgt dansk som standard sprog og installeret filerne vil MTool og MI starte med en dansk brugerflade.") (prompt "Vil Du installere de danske locale filer?"))
(
(copyfiles
(prompt "Installerer danske kataloger")
(source "Catalogs/dansk")
(pattern "#?")
(dest "Locale:Catalogs/dansk")
)
)
)
)
)
)
(if (askbool (help "Helpfilen tilbyder hjælpe funktion mens MI kører (engelsk).") (prompt "Vil Du installere hjælpefilen for MI?"))
(
(copyfiles
(prompt "Kopyierer hjælpefile:...")
(source "MI_GB.help")
(dest "ENVARC:")
(newname "MI.help")
)
)
)
(complete 70)
(if (askbool (help "Ikonerne bruges til at oprette ikoner for filer passende til deres type. Denne funktion er slået fra i den uregistrerede version.") (prompt "Vil Du installere ikonerne?"))
(
(set icondest
(askdir
(prompt "Vær venlig og vælg en skuffe til ikonerne.")
(help "Eksempel prefs filerne forventer ikonerne i standard skuffen.")
(default (tackon progdest "MToolIcons"))
(newpath)
)
)
(if (askbool (help "MagicWB er en samling af baggrunds mønstre og ikoner, resulterende i en meget flot 8-farvet Workbench. Du kan installere ikoner specielt designed til MagicWB.") (prompt "Bruger Du 'MagicWB'?"))
(
(copyfiles
(prompt "Kopierer ikoner...")
(source "MToolIcons/MWB")
(pattern "(~MT)#?.info")
(dest icondest)
)
(copyfiles
(source "MToolIcons/MWB/MTool.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MI.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MTPrefs.info")
(dest "SYS:Prefs")
(newname "MTool.info")
)
)
(
(copyfiles
(prompt "Kopierer ikoner...")
(source "MToolIcons")
(pattern "#?.info")
(dest icondest)
)
)
)
)
)
(complete 80)
(if (askbool (help "Dokumentationen består af to AmigaGuide manualer og en historie fil.") (prompt "Vil Du installere dokumentationen?"))
(
(set docdest
(askdir
(prompt "Vær venlig og vælg en skuffe til dokumentationen.")
(help "Det er lige meget hvor Du putter den, sålænge Du kan finde den igen...")
(default (tackon progdest "Docs"))
(newpath)
)
)
(copyfiles
(prompt "Kopierer dokumentationen...")
(source "Docs")
(pattern "#?_DK.#?")
(infos)
(dest docdest)
)
(copyfiles
(prompt "Kopierer dokumentationen...")
(source "Docs")
(pattern "#?_GB.#?")
(infos)
(dest docdest)
)
)
)
(complete 90)
(if (askbool (help "DatMon er nyttig hex modus af MI, Fineline 11 bruges i MTool's info requester.") (prompt "Vil Du installere fontene?"))
(
(set fontdest
(askdir
(prompt "Vær venlig og vælg en skuffe til fontene.")
(help "Hvis Du ikke 'assign add'er en anden font skuffe skulle Du ikke røre ved denne standard indstilling.")
(default "Fonts:")
(newpath)
)
)
(copyfiles
(prompt "Kopierer fonte...")
(source "Fonts")
(dest fontdest)
(pattern "#?")
)
)
)
(complete 99)
)
)
(if (= locale 1)
(
(message "\n HINWEIS ZUR INSTALLATION VON MTOOL:\n\n"
"Dieses Programm installiert MTool und MI auf Ihrem System. Sollten Sie eine der während der Installation auftretenden Fragen nicht verstehen, können Sie jederzeit 'Hilfe...' anwählen. Sie erhalten dann genaue Auskunft, was der nächste Arbeitsschritt macht und wozu er gut ist."
)
(set progdest
(askdir
(prompt "Bitte wählen Sie ein Verzeichnis für MTool aus.")
(help "In das gewählte Verzeichnis werden die Programme MTool und MI kopiert.")
(default "SYS:Tools")
(newpath)
)
)
(set @default-dest progdest)
(copyfiles
(prompt "Kopiere Hauptprogramm...")
(source "MTool")
(infos)
(dest progdest)
)
(complete 20)
(copyfiles
(prompt "Kopiere den Voreinstellungseditor zu MTool")
(if (askbool (help "Wenn Sie als Landessprache deutsch gewählt haben und diese Dateien installieren lassen, werden MTool und MI eine deutsche Benutzeroberfläche anzeigen.") (prompt "Soll die deutsche Sprachanpassung installiert werden?"))
(
(copyfiles
(prompt "Installiere deutsche Catalogs")
(source "Catalogs/deutsch")
(pattern "#?")
(dest "Locale:Catalogs/deutsch")
)
)
)
)
)
)
(if (askbool (help "Die Hilfsdatei bietet Ihnen eine deutschsprachige Hilfsfunktion in MI.") (prompt "Soll die Hilfsdatei zu MI kopiert werden?"))
(
(copyfiles
(prompt "Kopiere Hilfsdatei zu MI nach ENVARC:...")
(source "MI_D.help")
(dest "ENVARC:")
(newname "MI.help")
)
)
)
(complete 70)
(if (askbool (help "Die Icons werden von MTool benutzt, um Dateien gemäß ihrem Dateityp mit Icons versehen zu können. Diese Fähigkeit ist in der unregistrierten Version gesperrt.") (prompt "Sollen die Icons installiert werden?"))
(
(set icondest
(askdir
(prompt "Bitte wählen Sie ein Verzeichnis für die Icons aus.")
(help "Die mitgelieferte Voreinstellungsdatei erwartet die Icons im vorgegebenen Verzeichnis")
(default (tackon progdest "MToolIcons"))
(newpath)
)
)
(if (askbool (help "MagicWB ist eine Sammlung von Hintergrundgraphiken und Icons, die eine sehr schöne 8-farbige Workbench ergeben. Sie können dazu passende Icons installieren lassen") (prompt "Benutzen Sie 'MagicWB'?"))
(
(copyfiles
(prompt "Kopiere Icons...")
(source "MToolIcons/MWB")
(pattern "(~MT)#?.info")
(dest icondest)
)
(copyfiles
(source "MToolIcons/MWB/MTool.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MI.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MTPrefs.info")
(dest "SYS:Prefs")
(newname "MTool.info")
)
)
(
(copyfiles
(prompt "Kopiere Icons...")
(source "MToolIcons")
(pattern "#?.info")
(dest icondest)
)
)
)
)
)
(complete 80)
(if (askbool (help "Die Anleitungen umfassen zwei AmigaGuide-Dokumente und eine Änderungsdatei.") (prompt "Sollen die Anleitungen kopiert werden?"))
(
(set docdest
(askdir
(prompt "Bitte wählen Sie ein Verzeichnis für die Anleitungen aus.")
(help "Es ist egal, wo Sie die Anleitungen hinstecken, Sie sollten Sie bloß wiederfinden...")
(default (tackon progdest "Anleitungen"))
(newpath)
)
)
(copyfiles
(prompt "Kopiere Anleitungen...")
(source "Docs")
(pattern "#?_D.#?")
(infos)
(dest docdest)
)
)
)
(complete 90)
(if (askbool (help "Die Schrift DatMon ist im Hex-Modus von MI recht nützlich, Fineline 11 wird im Aboutrequester von MTool verwendet.") (prompt "Sollen die Schriften kopiert werden?"))
(
(set fontdest
(askdir
(prompt "Bitte wählen Sie ein Verzeichnis für die Schriften aus.")
(help "Wenn Sie kein Verzeichnis zum Fonts:-Verzeichnis zuge'add'et haben, sollten Sie die Einstellung bei Fonts: belassen.")
(default "Fonts:")
(newpath)
)
)
(copyfiles
(prompt "Kopiere Zeichensätze...")
(source "Fonts")
(dest fontdest)
(pattern "#?")
)
)
)
(complete 99)
)
)
(if (= locale 2)
(
(message "\n IMPORTANT NOTE:\n\n"
"This programm installs MTool and MI on your Amiga. If you don't understand one of the questions that show up during installation, please select the 'help...' button. You will be instructed then about the next step and what it's good for."
)
(set progdest
(askdir
(prompt "Please select a drawer for MTool.")
(help "MTool and MI will be copied to this drawer.")
(if (askbool (help "The helpfile offers a help function while running MI.") (prompt "Do you want to install the helpfile for MI?"))
(
(copyfiles
(prompt "Copying helpfile:...")
(source "MI_GB.help")
(dest "ENVARC:")
(newname "MI.help")
)
)
)
(complete 70)
(if (askbool (help "The icons will be used in MTool to create icons for files according to their type. This feature is disabled in the unregistered version.") (prompt "Do you want to install the icons?"))
(
(set icondest
(askdir
(prompt "Please select a drawer for the icons.")
(help "The example prefs file expects the icons in the default drawer.")
(default (tackon progdest "MToolIcons"))
(newpath)
)
)
(if (askbool (help "MagicWB is a collection of background patterns and icons, providing a very nice 8-coloured Workbench. You can install icons especially designed for MagicWB.") (prompt "Do you use 'MagicWB'?"))
(
(copyfiles
(prompt "Copying icons...")
(source "MToolIcons/MWB")
(pattern "(~MT)#?.info")
(dest icondest)
)
(copyfiles
(source "MToolIcons/MWB/MTool.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MI.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MTPrefs.info")
(dest "SYS:Prefs")
(newname "MTool.info")
)
)
(
(copyfiles
(prompt "Copying icons...")
(source "MToolIcons")
(pattern "#?.info")
(dest icondest)
)
)
)
)
)
(complete 80)
(if (askbool (help "The docs iclude two AmigaGuide documents and a history file.") (prompt "Do you want to install the docs?"))
(
(set docdest
(askdir
(prompt "Please select a drawer for the docs.")
(help "It doesn't matter where you put the docs, if you manage to refind them...")
(default (tackon progdest "Docs"))
(newpath)
)
)
(copyfiles
(prompt "Copying Docs...")
(source "Docs")
(pattern "#?_GB.#?")
(infos)
(dest docdest)
)
)
)
(complete 90)
(if (askbool (help "DatMon is useful in hex mode of MI, Fineline 11 is used in MTools about requester.") (prompt "Do you want to install the fonts?"))
(
(set fontdest
(askdir
(prompt "Please select a drawer for the fonts.")
(help "If you didn't 'assign add' another font drawer, you shouldn't tuch this default setting.")
(default "Fonts:")
(newpath)
)
)
(copyfiles
(prompt "Copying fonts...")
(source "Fonts")
(dest fontdest)
(pattern "#?")
)
)
)
(complete 99)
)
)
(if (= locale 3)
(
(message "\n IMPORTANT NOTE:\n\n"
"This programm installs MTool and MI on your Amiga. If you don't understand one of the questions that show up during installation, please select the 'help...' button. You will be instructed then about the next step and what it's good for."
)
(set progdest
(askdir
(prompt "Please select a drawer for MTool.")
(help "MTool and MI will be copied to this drawer.")
(if (askbool (help "If you selected español as default language and install these files, MTool and MI will show up with a spanish user interface.") (prompt "Do you want to install the spanish locale files?"))
(
(copyfiles
(prompt "Installing Spanish Catalogs")
(source "Catalogs/español")
(pattern "#?")
(dest "Locale:Catalogs/español")
)
)
)
)
)
)
(if (askbool (help "The helpfile offers a help function while running MI.") (prompt "Do you want to install the helpfile for MI?"))
(
(copyfiles
(prompt "Copying helpfile:...")
(source "MI_GB.help")
(dest "ENVARC:")
(newname "MI.help")
)
)
)
(complete 70)
(if (askbool (help "The icons will be used in MTool to create icons for files according to their type. This feature is disabled in the unregistered version.") (prompt "Do you want to install the icons?"))
(
(set icondest
(askdir
(prompt "Please select a drawer for the icons.")
(help "The example prefs file expects the icons in the default drawer.")
(default (tackon progdest "MToolIcons"))
(newpath)
)
)
(if (askbool (help "MagicWB is a collection of background patterns and icons, providing a very nice 8-coloured Workbench. You can install icons especially designed for MagicWB.") (prompt "Do you use 'MagicWB'?"))
(
(copyfiles
(prompt "Copying icons...")
(source "MToolIcons/MWB")
(pattern "(~MT)#?.info")
(dest icondest)
)
(copyfiles
(source "MToolIcons/MWB/MTool.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MI.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MTPrefs.info")
(dest "SYS:Prefs")
(newname "MTool.info")
)
)
(
(copyfiles
(prompt "Copying icons...")
(source "MToolIcons")
(pattern "#?.info")
(dest icondest)
)
)
)
)
)
(complete 80)
(if (askbool (help "The docs iclude two AmigaGuide documents and a history file.") (prompt "Do you want to install the docs?"))
(
(set docdest
(askdir
(prompt "Please select a drawer for the docs.")
(help "It doesn't matter where you put the docs, if you manage to refind them...")
(default (tackon progdest "Docs"))
(newpath)
)
)
(copyfiles
(prompt "Copying Docs...")
(source "Docs")
(pattern "#?_GB.#?")
(infos)
(dest docdest)
)
(copyfiles
(prompt "Copying Docs...")
(source "Docs")
(pattern "#?_E.#?")
(infos)
(dest docdest)
)
)
)
(complete 90)
(if (askbool (help "DatMon is useful in hex mode of MI, Fineline 11 is used in MTools about requester.") (prompt "Do you want to install the fonts?"))
(
(set fontdest
(askdir
(prompt "Please select a drawer for the fonts.")
(help "If you didn't 'assign add' another font drawer, you shouldn't tuch this default setting.")
(default "Fonts:")
(newpath)
)
)
(copyfiles
(prompt "Copying fonts...")
(source "Fonts")
(dest fontdest)
(pattern "#?")
)
)
)
(complete 99)
)
)
(if (= locale 4)
(
(message "\n IMPORTANT NOTE:\n\n"
"This programm installs MTool and MI on your Amiga. If you don't understand one of the questions that show up during installation, please select the 'help...' button. You will be instructed then about the next step and what it's good for."
)
(set progdest
(askdir
(prompt "Please select a drawer for MTool.")
(help "MTool and MI will be copied to this drawer.")
(if (askbool (help "If you selected français as default language and install these files, MTool and MI will show up with a French user interface.") (prompt "Do you want to install the French locale files?"))
(
(copyfiles
(prompt "Installing French Catalogs")
(source "Catalogs/français")
(pattern "#?")
(dest "Locale:Catalogs/français")
)
)
)
)
)
)
(if (askbool (help "The helpfile offers a help function while running MI.") (prompt "Do you want to install the helpfile for MI?"))
(
(copyfiles
(prompt "Copying helpfile:...")
(source "MI_GB.help")
(dest "ENVARC:")
(newname "MI.help")
)
)
)
(complete 70)
(if (askbool (help "The icons will be used in MTool to create icons for files according to their type. This feature is disabled in the unregistered version.") (prompt "Do you want to install the icons?"))
(
(set icondest
(askdir
(prompt "Please select a drawer for the icons.")
(help "The example prefs file expects the icons in the default drawer.")
(default (tackon progdest "MToolIcons"))
(newpath)
)
)
(if (askbool (help "MagicWB is a collection of background patterns and icons, providing a very nice 8-coloured Workbench. You can install icons especially designed for MagicWB.") (prompt "Do you use 'MagicWB'?"))
(
(copyfiles
(prompt "Copying icons...")
(source "MToolIcons/MWB")
(pattern "(~MT)#?.info")
(dest icondest)
)
(copyfiles
(source "MToolIcons/MWB/MTool.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MI.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MTPrefs.info")
(dest "SYS:Prefs")
(newname "MTool.info")
)
)
(
(copyfiles
(prompt "Copying icons...")
(source "MToolIcons")
(pattern "#?.info")
(dest icondest)
)
)
)
)
)
(complete 80)
(if (askbool (help "The docs iclude two AmigaGuide documents and a history file.") (prompt "Do you want to install the docs?"))
(
(set docdest
(askdir
(prompt "Please select a drawer for the docs.")
(help "It doesn't matter where you put the docs, if you manage to refind them...")
(default (tackon progdest "Docs"))
(newpath)
)
)
(copyfiles
(prompt "Copying Docs...")
(source "Docs")
(pattern "#?_GB.#?")
(infos)
(dest docdest)
)
)
)
(complete 90)
(if (askbool (help "DatMon is useful in hex mode of MI, Fineline 11 is used in MTools about requester.") (prompt "Do you want to install the fonts?"))
(
(set fontdest
(askdir
(prompt "Please select a drawer for the fonts.")
(help "If you didn't 'assign add' another font drawer, you shouldn't tuch this default setting.")
(default "Fonts:")
(newpath)
)
)
(copyfiles
(prompt "Copying fonts...")
(source "Fonts")
(dest fontdest)
(pattern "#?")
)
)
)
(complete 99)
)
)
(if (= locale 5)
(
(message "\n IMPORTANT NOTE:\n\n"
"This programm installs MTool and MI on your Amiga. If you don't understand one of the questions that show up during installation, please select the 'help...' button. You will be instructed then about the next step and what it's good for."
)
(set progdest
(askdir
(prompt "Please select a drawer for MTool.")
(help "MTool and MI will be copied to this drawer.")
(if (askbool (help "If you selected svenska as default language and install these files, MTool and MI will show up with a Swedish user interface.") (prompt "Do you want to install the Swedish locale files?"))
(
(copyfiles
(prompt "Installing Swedish Catalogs")
(source "Catalogs/svenska")
(pattern "#?")
(dest "Locale:Catalogs/svenska")
)
)
)
)
)
)
(if (askbool (help "The helpfile offers a help function while running MI.") (prompt "Do you want to install the helpfile for MI?"))
(
(copyfiles
(prompt "Copying helpfile:...")
(source "MI_S.help")
(dest "ENVARC:")
(newname "MI.help")
)
)
)
(complete 70)
(if (askbool (help "The icons will be used in MTool to create icons for files according to their type. This feature is disabled in the unregistered version.") (prompt "Do you want to install the icons?"))
(
(set icondest
(askdir
(prompt "Please select a drawer for the icons.")
(help "The example prefs file expects the icons in the default drawer.")
(default (tackon progdest "MToolIcons"))
(newpath)
)
)
(if (askbool (help "MagicWB is a collection of background patterns and icons, providing a very nice 8-coloured Workbench. You can install icons especially designed for MagicWB.") (prompt "Do you use 'MagicWB'?"))
(
(copyfiles
(prompt "Copying icons...")
(source "MToolIcons/MWB")
(pattern "(~MT)#?.info")
(dest icondest)
)
(copyfiles
(source "MToolIcons/MWB/MTool.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MI.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MTPrefs.info")
(dest "SYS:Prefs")
(newname "MTool.info")
)
)
(
(copyfiles
(prompt "Copying icons...")
(source "MToolIcons")
(pattern "#?.info")
(dest icondest)
)
)
)
)
)
(complete 80)
(if (askbool (help "The docs iclude two AmigaGuide documents and a history file.") (prompt "Do you want to install the docs?"))
(
(set docdest
(askdir
(prompt "Please select a drawer for the docs.")
(help "It doesn't matter where you put the docs, if you manage to refind them...")
(default (tackon progdest "Docs"))
(newpath)
)
)
(copyfiles
(prompt "Copying Docs...")
(source "Docs")
(pattern "#?_S.#?")
(infos)
(dest docdest)
)
(copyfiles
(prompt "Copying Docs...")
(source "Docs")
(pattern "#?_GB.#?")
(infos)
(dest docdest)
)
)
)
(complete 90)
(if (askbool (help "DatMon is useful in hex mode of MI, Fineline 11 is used in MTools about requester.") (prompt "Do you want to install the fonts?"))
(
(set fontdest
(askdir
(prompt "Please select a drawer for the fonts.")
(help "If you didn't 'assign add' another font drawer, you shouldn't tuch this default setting.")
(default "Fonts:")
(newpath)
)
)
(copyfiles
(prompt "Copying fonts...")
(source "Fonts")
(dest fontdest)
(pattern "#?")
)
)
)
(complete 99)
)
)
(if (= locale 6)
(
(message "\n IMPORTANT NOTE:\n\n"
"This programm installs MTool and MI on your Amiga. If you don't understand one of the questions that show up during installation, please select the 'help...' button. You will be instructed then about the next step and what it's good for."
)
(set progdest
(askdir
(prompt "Please select a drawer for MTool.")
(help "MTool and MI will be copied to this drawer.")
(if (askbool (help "If you selected italiano as default language and install these files, MTool and MI will show up with a italian user interface.") (prompt "Do you want to install the italian locale files?"))
(
(copyfiles
(prompt "Installing Italian Catalogs")
(source "Catalogs/italiano")
(pattern "#?")
(dest "Locale:Catalogs/italiano")
)
)
)
)
)
)
(if (askbool (help "The helpfile offers a help function while running MI.") (prompt "Do you want to install the helpfile for MI?"))
(
(copyfiles
(prompt "Copying helpfile:...")
(source "MI_GB.help")
(dest "ENVARC:")
(newname "MI.help")
)
)
)
(complete 70)
(if (askbool (help "The icons will be used in MTool to create icons for files according to their type. This feature is disabled in the unregistered version.") (prompt "Do you want to install the icons?"))
(
(set icondest
(askdir
(prompt "Please select a drawer for the icons.")
(help "The example prefs file expects the icons in the default drawer.")
(default (tackon progdest "MToolIcons"))
(newpath)
)
)
(if (askbool (help "MagicWB is a collection of background patterns and icons, providing a very nice 8-coloured Workbench. You can install icons especially designed for MagicWB.") (prompt "Do you use 'MagicWB'?"))
(
(copyfiles
(prompt "Copying icons...")
(source "MToolIcons/MWB")
(pattern "(~MT)#?.info")
(dest icondest)
)
(copyfiles
(source "MToolIcons/MWB/MTool.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MI.info")
(dest progdest)
)
(copyfiles
(source "MToolIcons/MWB/MTPrefs.info")
(dest "SYS:Prefs")
(newname "MTool.info")
)
)
(
(copyfiles
(prompt "Copying icons...")
(source "MToolIcons")
(pattern "#?.info")
(dest icondest)
)
)
)
)
)
(complete 80)
(if (askbool (help "The docs iclude two AmigaGuide documents and a history file.") (prompt "Do you want to install the docs?"))
(
(set docdest
(askdir
(prompt "Please select a drawer for the docs.")
(help "It doesn't matter where you put the docs, if you manage to refind them...")
(default (tackon progdest "Docs"))
(newpath)
)
)
(copyfiles
(prompt "Copying Docs...")
(source "Docs")
(pattern "#?_GB.#?")
(infos)
(dest docdest)
)
(copyfiles
(prompt "Copying Docs...")
(source "Docs")
(pattern "#?_I.#?")
(infos)
(dest docdest)
)
)
)
(complete 90)
(if (askbool (help "DatMon is useful in hex mode of MI, Fineline 11 is used in MTools about requester.") (prompt "Do you want to install the fonts?"))
(
(set fontdest
(askdir
(prompt "Please select a drawer for the fonts.")
(help "If you didn't 'assign add' another font drawer, you shouldn't tuch this default setting.")